home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 12 / 012.d81 / back issue boot (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  960b  |  26 lines
  1. 0 rem   back issue boot
  2. 10 poke53280,6:poke53281,0:print"[147]"
  3. 20 print"  [217]ou are about to enter the realm of "
  4. 30 print"             [194][193][195][203][160][201][211][211][213][197][211]."
  5. 35 gosub10000
  6. 40 print"[147]  [212]o scroll through the back issue"
  7. 50 print"list, simply press the [198]1 or [198]7 keys."
  8. 60 print"[217]ou may also search for a particular"
  9. 70 print"word or phrase.  [211]imply press 'f' to "
  10. 80 print"begin the search.  [215]hile the computer"
  11. 90 print"is searching, the border will flash."
  12. 100 print"[201]f the border stops, don't worry, the"
  13. 110 print"computer is merely housekeeping."
  14. 120 print"[201]f you want to stop while the computer"
  15. 130 print"is searching, just press a key."
  16. 140 gosub10000
  17. 150 print"[147]"
  18. 160 print"        1.  [204]ook at back issue list"
  19. 170 print"        2.  [210]eturn to [204][207][193][196][211][212][193][210]"
  20. 180 print"[215]hich?"
  21. 190 poke198,0:wait198,1:getk$:ifk$<>"1"andk$<>"2"then150
  22. 200 ifk$="1"thenf$="back issues"
  23. 210 ifk$="2"thenf$="hello"
  24. 220 print"[147]load"chr$(34)f$chr$(34)",8":print"run":poke631,13:poke632,13:poke198,2:end
  25. 10000 print""spc(12)"<press a key>":poke198,0:wait198,1:return
  26.